home *** CD-ROM | disk | FTP | other *** search
/ Hot Metal Pro 4.0 / Hot Metal Pro 4.0.iso / HMPRO4 / top.z / osl.ofr < prev    next >
Encoding:
Text File  |  1997-07-28  |  10.0 KB  |  332 lines
  1. # OpenMarket, Inc
  2. # Tue Mar 19 15:33:57 EST 1996
  3. #
  4. # $Id: OSL.ofr,v 1.35 1996/07/08 13:59:01 henry Exp $
  5. #
  6. # An offer description for a digital offer expected by
  7. #  Open Market Secure Link. 
  8.  
  9.  
  10. offer {
  11.     name "OM-Secure Link 2.0 Offer Description"
  12.     date "Wed May  8 18:18:30 EDT 1996"
  13.     type env
  14.     version {OSL 2.01 OMT 2.2}
  15.     author "OpenMarket Secure Link Software Developer's Kit"
  16.     generated "vi"
  17.         translator {<!--#exec cmd="mdohref %s"-->}
  18.     brand http://www.openmarket.com/offerlibrary/omi.gif
  19. } 
  20.  
  21. # OSL designates a store as an integer of length 8 (or less).
  22. # Most applications will want to call it a 'store', but OM-Transact calls
  23. # stores 'key identifiers', for historical reasons.
  24. #
  25. # The 'prohibited' expression is not necessary. If not stated
  26. #  explicitly, a row's value is neither required *nor* prohibited.
  27. #  In other words, its optional.
  28. #
  29. # By convention (and by convention only), the type information is
  30. #  usually described as satisfying a regular expression and any
  31. #  additional constraints are stated in the optional constraint
  32. #  row attribute.
  33.  
  34. row {
  35.     name StoreID
  36.     comment "The identification for your store."
  37.      tag kid
  38.      type {expr {[regexp {^[0-9]+$} [getrow StoreID valuedefault]] && [expr {[string length [getrow StoreID valuedefault]] <= 8}] }}
  39. }
  40.  
  41. row {
  42.     name  Name 
  43.     tag   desc 
  44.     comment "product name or short description"
  45.     prohibited {expr {[string compare [getrow Type valuedefault] none] == 0} }
  46.     required {expr { [string compare [getrow Type valuedefault] none] != 0 } }
  47. } 
  48.  
  49.  
  50. row {
  51.     name Type
  52.     tag  ""
  53.     comment "type of product being offered"
  54.     type {regexp {^(tangible|online|none)$} [getrow Type valuedefault]}
  55.     required {return 1}
  56. }
  57.  
  58. row {
  59.     name type
  60.     tag  goodstype
  61.     comment "this is for internal use only"
  62.     prohibited {return 1}
  63. }
  64.  
  65. row {
  66.     name  UniqueID
  67.     tag domain
  68.     comment "unique product identification code, e.g. model number, SKU. For online goods, string or number associated with FulfillmentURL that fulfillment server uses to identify the scope, region, or domain of the online content"
  69.  
  70.     constraint { if {[string length [getrow UniqueID valuedefault]] > 40 } {return 0} elseif {![string match [getrow Subscription valuedefault] 1]} {return 1} elseif {![regexp {^[0-9][0-9]*$} [getrow UniqueID valuedefault]]} {return 0} elseif {[getrow UniqueID valuedefault] <= 255} {return 1} else {return 0} }
  71.     prohibited {expr {[string compare [getrow Type valuedefault] none] == 0} }
  72.     required {expr { [string compare [getrow Type valuedefault] none] != 0 } }
  73. } 
  74.  
  75. row {
  76.     name TaxClass
  77.     tag ProdCode
  78.     comment "product classification code used for sales tax calculation"
  79.     type {expr { [regexp {^[0-9]+$} [getrow TaxClass valuedefault] ] && [expr {[string length [getrow TaxClass valuedefault]] <= 5}] } }
  80.     prohibited {expr {[string compare [getrow Type valuedefault] none] == 0} }
  81. } 
  82.  
  83.  
  84. row {
  85.     name  ShippingWeight
  86.     tag weight
  87.     comment "product weight for computing a shipping charge"
  88.     type {regexp {^[1-9][0-9]*$} [getrow ShippingWeight valuedefault]}
  89.     prohibited {expr {![string match [getrow Type valuedefault] tangible] || [boundrow ShippingCharge value] || ![string compare [getrow Type valuedefault] none] } }
  90. } 
  91.  
  92. row {
  93.     name Detail
  94.     tag detail
  95.     comment "descriptive information; reported on merchant's SmartStatement"
  96.     prohibited {expr { [string match [getrow Subscription valuedefault] 1] || [string match [getrow Type valuedefault] none] } }
  97. } 
  98.  
  99.  
  100. row {
  101.     name StatusURL
  102.     tag ""
  103.     comment "merchant-suppied order status page that supercedes the OM-Transact status page"
  104.     type {regexp {^((http|https)://[^:/]+(:[0-9]+)?)?(.*)} [getrow StatusURL valuedefault]}
  105.     prohibited {expr {![string match [getrow Type valuedefault] tangible]}}
  106. } 
  107.  
  108. row {
  109.     name status_url
  110.     tag url
  111.     comment "this is for internal use only"
  112.     prohibited {return 1}
  113. }
  114.  
  115.  
  116.  
  117. #
  118. #  !!!! IMPORTANT
  119. #  !!!! This row needs special treatment in libdo
  120. #  !!!! Be extremly careful when you modify it.
  121. #
  122. row {
  123.     name FulfillmentURL
  124.     tag ""
  125.     comment "on-line location of the product; or the first page of a subscription"
  126.     type {regexp {^((http|https)://[^:/]+(:[0-9]+)?)?(.*)} [getrow FulfillmentURL valuedefault]}
  127.     required {string match [getrow Type valuedefault] online}
  128.     prohibited {expr {![string match [getrow Type valuedefault] online]}}
  129. } 
  130.  
  131. row {
  132.     name region_url
  133.     tag url 
  134.     comment "this is for internal use only"
  135.     prohibited {return 1}
  136. } 
  137.  
  138. row {
  139.     name subs_url
  140.     tag detail.url 
  141.     comment "this is for internal use only"
  142.     prohibited {return 1}
  143. } 
  144.  
  145. row {
  146.     name url
  147.     tag url 
  148.     comment "this is for internal use only"
  149.     prohibited {return 1}
  150. } 
  151.  
  152. row {
  153.     name fmt
  154.     tag fmt 
  155.     comment "this is for internal use only"
  156. } 
  157.  
  158. row {
  159.     name  Subscription
  160.     tag ""
  161.     comment "is online product a subscription?"
  162.     type {regexp {^[0|1]$} [getrow Subscription valuedefault]}
  163.     prohibited {expr {![string match [getrow Type valuedefault] online]}}
  164. } 
  165.  
  166. #
  167. #  !!!! IMPORTANT
  168. #  !!!! This row needs special treatment in libdo
  169. #  !!!! Be extremly careful when you modify it.
  170. #
  171. row {
  172.     name SubscriptionDuration
  173.     tag ""
  174.     comment "length of subscription in months"
  175.     type {regexp {^[1-9][0-9]*$} [getrow SubscriptionDuration valuedefault]}
  176.     required {string match [getrow Subscription valuedefault] 1}
  177.     prohibited {expr {![string match [getrow Subscription valuedefault] 1]}}
  178. } 
  179.  
  180. row {
  181.     name subs_duration
  182.     tag detail.duration
  183.     comment "this is for internal use only"
  184.     prohibited {return 1}
  185. } 
  186.  
  187. row {
  188.     name renew
  189.     tag renew
  190.     comment "this is for internal use only"
  191.     prohibited {return 1}
  192. } 
  193.  
  194. row {
  195.     name AutoRenew
  196.     tag ""
  197.     comment "subscription is automatically renewed when it expires"
  198.     type {regexp {^[0|1]$} [getrow AutoRenew valuedefault]}
  199.     prohibited {expr {![string match [getrow Subscription valuedefault] 1]}}
  200. } 
  201.  
  202. row {
  203.     name RefundPolicy
  204.     tag detail.refund 
  205.     comment "subscription refund policy"
  206.     type {regexp {^(none|prorate|full)$} [getrow RefundPolicy valuedefault]}
  207.     prohibited {expr {![string match [getrow Subscription valuedefault] 1]}}
  208. } 
  209.  
  210. row {
  211.     name Currency
  212.     tag cc
  213.     comment "currency code, three digits, ISO 4217."
  214.     type { regexp {^[0-9A-Za-z][0-9A-Za-z][0-9A-Za-z]?$} [getrow Currency valuedefault] }
  215. }
  216.  
  217. row {
  218.     name Price
  219.     tag amt
  220.     comment "offer price"
  221.     type {regexp {^[0-9]+(\.[0-9]?[0-9]?)?$} [getrow Price valuedefault] }
  222.     prohibited {string match [getrow Type valuedefault] none }
  223.     required {expr { [string compare [getrow Type valuedefault] "none"] != 0 } }
  224. } 
  225.  
  226. row {
  227.     name Quantity
  228.     tag qty
  229.     comment "number of items being purchased"
  230.     type {regexp {^[1-9][0-9]*$} [getrow Quantity valuedefault]}
  231.     prohibited {string match [getrow Type valuedefault] none }
  232. } 
  233.  
  234. row {
  235.     name MaximumQuantity
  236.     tag maxqty
  237.     comment "maximum number of items that can be purchased"
  238.     type {regexp {^[0-9]+$} [getrow MaximumQuantity valuedefault]}
  239.     constraint {expr {[getrow MaximumQuantity valuedefault] >= [getrow Quantity valuedefault]} } 
  240.     prohibited {string match [getrow Type valuedefault] none }
  241. } 
  242.  
  243. row {
  244.     name  InstallmentCount
  245.     tag n_inst
  246.     comment "number of payments"
  247.     type {expr { [regexp {^[1-9][0-9]*$} [getrow InstallmentCount valuedefault] ] && [expr {! [string match [getrow InstallmentCount valuedefault] "1"] }] } }
  248.     prohibited {expr {![string match [getrow Subscription valuedefault] 1] || [string match [getrow AutoRenew valuedefault] 1] }}
  249.     required { expr [boundrow InstallmentPeriod valuedefault] }
  250. } 
  251.  
  252. row {
  253.     name InstallmentPeriod
  254.     tag inst
  255.     comment "number of months between payments"
  256.     type {regexp {^[1-9][0-9]*$} [getrow InstallmentPeriod valuedefault]}
  257.     prohibited { expr {![boundrow InstallmentCount valuedefault]} }
  258.     required { expr [boundrow InstallmentCount valuedefault] }
  259. } 
  260.  
  261. row {
  262.     name TrialPeriod
  263.     tag free
  264.     comment "period before billing begins"
  265.     type {regexp {^[0-9]+(d|w|m)?$} [getrow TrialPeriod valuedefault]}
  266.     prohibited {expr {![string match [getrow Subscription valuedefault] 1]} }
  267. } 
  268.  
  269. row {
  270.     name GracePeriod
  271.     tag grace
  272.     comment "days before billing is performed"
  273.     type {regexp {^[0-9]+$} [getrow GracePeriod valuedefault]}
  274.     prohibited {expr {![string match [getrow Subscription valuedefault] 1]} }
  275. } 
  276.  
  277. row {
  278.     name ShippingCharge
  279.     tag freight
  280.     comment "fixed shipping charge for the product"
  281.     type {regexp {^[0-9]*(\.[0-9]?[0-9]?)?$} [getrow ShippingCharge valuedefault]}
  282.     prohibited {expr {![string match [getrow Type valuedefault] tangible] || [boundrow ShippingWeight value]} }
  283. } 
  284.  
  285. row {
  286.     name Operation
  287.     tag op
  288.     comment "buyer action"
  289.     type {regexp {^(add|addview|view)$} [getrow Operation valuedefault] }
  290.     prohibited { if {[string match [getrow Type valuedefault] none]} {expr {![string match [getrow Operation valuedefault] view]} } else {expr { [string match [getrow Operation valuedefault] view ] }} }
  291.     required {expr {[string match [getrow Type valuedefault] none]} }
  292. } 
  293.  
  294. row {
  295.     name AccountRequired
  296.     tag acctreqd
  297.     comment "Is OM-Transact account required"
  298.     type {regexp {^[0|1]$} [getrow AccountRequired valuedefault] }
  299.     prohibited {string match [getrow Type valuedefault] none }
  300. } 
  301.  
  302. row {
  303.     name OfferExpires
  304.     tag valid
  305.     comment "shelf life of the offer, i.e., date after which the offer will no longer be honered by the merchant"
  306.     type {regexp {^[1-9][0-9]*$} [getrow OfferExpires valuedefault]}
  307.     prohibited {string match [getrow Type valuedefault] none }
  308. } 
  309.  
  310. row {
  311.     name ReceiptDuration
  312.     tag expire
  313.     comment "access window, i.e., duration in seconds that the buyer has to access an online product from the time the Digital Receipt is created"
  314.     type {regexp {^[1-9][0-9]*$} [getrow ReceiptDuration valuedefault]}
  315.     prohibited {expr {![string match [getrow Type valuedefault] online]}}
  316. } 
  317.  
  318. row {
  319.     name OfferURL
  320.     tag ""
  321.     type {regexp {^((http|https)://[^:/]+(:[0-9]+)?)?(.*)} [getrow OfferURL valuedefault]}
  322.     required {expr 1}
  323. } 
  324.  
  325. row {
  326.     name curl
  327.     tag curl
  328.     comment "this is for internal use only"
  329.     prohibited {return 1}
  330. }
  331.  
  332.